3.31.45 \(\int \frac {1}{(a+b (c x^n)^{3/n})^3} \, dx\) [3045]

3.31.45.1 Optimal result
3.31.45.2 Mathematica [A] (verified)
3.31.45.3 Rubi [A] (verified)
3.31.45.4 Maple [C] (warning: unable to verify)
3.31.45.5 Fricas [B] (verification not implemented)
3.31.45.6 Sympy [F]
3.31.45.7 Maxima [F]
3.31.45.8 Giac [F]
3.31.45.9 Mupad [F(-1)]

3.31.45.1 Optimal result

Integrand size = 17, antiderivative size = 235 \[ \int \frac {1}{\left (a+b \left (c x^n\right )^{3/n}\right )^3} \, dx=\frac {x}{6 a \left (a+b \left (c x^n\right )^{3/n}\right )^2}+\frac {5 x}{18 a^2 \left (a+b \left (c x^n\right )^{3/n}\right )}-\frac {5 x \left (c x^n\right )^{-1/n} \arctan \left (\frac {\sqrt [3]{a}-2 \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}}{\sqrt {3} \sqrt [3]{a}}\right )}{9 \sqrt {3} a^{8/3} \sqrt [3]{b}}+\frac {5 x \left (c x^n\right )^{-1/n} \log \left (\sqrt [3]{a}+\sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}\right )}{27 a^{8/3} \sqrt [3]{b}}-\frac {5 x \left (c x^n\right )^{-1/n} \log \left (a^{2/3}-\sqrt [3]{a} \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+b^{2/3} \left (c x^n\right )^{2/n}\right )}{54 a^{8/3} \sqrt [3]{b}} \]

output
1/6*x/a/(a+b*(c*x^n)^(3/n))^2+5/18*x/a^2/(a+b*(c*x^n)^(3/n))+5/27*x*ln(a^( 
1/3)+b^(1/3)*(c*x^n)^(1/n))/a^(8/3)/b^(1/3)/((c*x^n)^(1/n))-5/54*x*ln(a^(2 
/3)-a^(1/3)*b^(1/3)*(c*x^n)^(1/n)+b^(2/3)*(c*x^n)^(2/n))/a^(8/3)/b^(1/3)/( 
(c*x^n)^(1/n))-5/27*x*arctan(1/3*(a^(1/3)-2*b^(1/3)*(c*x^n)^(1/n))/a^(1/3) 
*3^(1/2))/a^(8/3)/b^(1/3)/((c*x^n)^(1/n))*3^(1/2)
 
3.31.45.2 Mathematica [A] (verified)

Time = 0.49 (sec) , antiderivative size = 211, normalized size of antiderivative = 0.90 \[ \int \frac {1}{\left (a+b \left (c x^n\right )^{3/n}\right )^3} \, dx=\frac {x \left (c x^n\right )^{-1/n} \left (\frac {9 a^{5/3} \left (c x^n\right )^{\frac {1}{n}}}{\left (a+b \left (c x^n\right )^{3/n}\right )^2}+\frac {15 a^{2/3} \left (c x^n\right )^{\frac {1}{n}}}{a+b \left (c x^n\right )^{3/n}}-\frac {10 \sqrt {3} \arctan \left (\frac {1-\frac {2 \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}}{\sqrt [3]{a}}}{\sqrt {3}}\right )}{\sqrt [3]{b}}+\frac {10 \log \left (\sqrt [3]{a}+\sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}\right )}{\sqrt [3]{b}}-\frac {5 \log \left (a^{2/3}-\sqrt [3]{a} \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+b^{2/3} \left (c x^n\right )^{2/n}\right )}{\sqrt [3]{b}}\right )}{54 a^{8/3}} \]

input
Integrate[(a + b*(c*x^n)^(3/n))^(-3),x]
 
output
(x*((9*a^(5/3)*(c*x^n)^n^(-1))/(a + b*(c*x^n)^(3/n))^2 + (15*a^(2/3)*(c*x^ 
n)^n^(-1))/(a + b*(c*x^n)^(3/n)) - (10*Sqrt[3]*ArcTan[(1 - (2*b^(1/3)*(c*x 
^n)^n^(-1))/a^(1/3))/Sqrt[3]])/b^(1/3) + (10*Log[a^(1/3) + b^(1/3)*(c*x^n) 
^n^(-1)])/b^(1/3) - (5*Log[a^(2/3) - a^(1/3)*b^(1/3)*(c*x^n)^n^(-1) + b^(2 
/3)*(c*x^n)^(2/n)])/b^(1/3)))/(54*a^(8/3)*(c*x^n)^n^(-1))
 
3.31.45.3 Rubi [A] (verified)

Time = 0.36 (sec) , antiderivative size = 238, normalized size of antiderivative = 1.01, number of steps used = 12, number of rules used = 11, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.647, Rules used = {786, 749, 749, 750, 16, 1142, 25, 27, 1082, 217, 1103}

Below are the steps used by Rubi to obtain the solution. The rule number used for the transformation is given above next to the arrow. The rules definitions used are listed below.

\(\displaystyle \int \frac {1}{\left (a+b \left (c x^n\right )^{3/n}\right )^3} \, dx\)

\(\Big \downarrow \) 786

\(\displaystyle x \left (c x^n\right )^{-1/n} \int \frac {1}{\left (b \left (c x^n\right )^{3/n}+a\right )^3}d\left (c x^n\right )^{\frac {1}{n}}\)

\(\Big \downarrow \) 749

\(\displaystyle x \left (c x^n\right )^{-1/n} \left (\frac {5 \int \frac {1}{\left (b \left (c x^n\right )^{3/n}+a\right )^2}d\left (c x^n\right )^{\frac {1}{n}}}{6 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{6 a \left (a+b \left (c x^n\right )^{3/n}\right )^2}\right )\)

\(\Big \downarrow \) 749

\(\displaystyle x \left (c x^n\right )^{-1/n} \left (\frac {5 \left (\frac {2 \int \frac {1}{b \left (c x^n\right )^{3/n}+a}d\left (c x^n\right )^{\frac {1}{n}}}{3 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{3 a \left (a+b \left (c x^n\right )^{3/n}\right )}\right )}{6 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{6 a \left (a+b \left (c x^n\right )^{3/n}\right )^2}\right )\)

\(\Big \downarrow \) 750

\(\displaystyle x \left (c x^n\right )^{-1/n} \left (\frac {5 \left (\frac {2 \left (\frac {\int \frac {2 \sqrt [3]{a}-\sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}}{b^{2/3} \left (c x^n\right )^{2/n}-\sqrt [3]{a} \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+a^{2/3}}d\left (c x^n\right )^{\frac {1}{n}}}{3 a^{2/3}}+\frac {\int \frac {1}{\sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+\sqrt [3]{a}}d\left (c x^n\right )^{\frac {1}{n}}}{3 a^{2/3}}\right )}{3 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{3 a \left (a+b \left (c x^n\right )^{3/n}\right )}\right )}{6 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{6 a \left (a+b \left (c x^n\right )^{3/n}\right )^2}\right )\)

\(\Big \downarrow \) 16

\(\displaystyle x \left (c x^n\right )^{-1/n} \left (\frac {5 \left (\frac {2 \left (\frac {\int \frac {2 \sqrt [3]{a}-\sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}}{b^{2/3} \left (c x^n\right )^{2/n}-\sqrt [3]{a} \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+a^{2/3}}d\left (c x^n\right )^{\frac {1}{n}}}{3 a^{2/3}}+\frac {\log \left (\sqrt [3]{a}+\sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}\right )}{3 a^{2/3} \sqrt [3]{b}}\right )}{3 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{3 a \left (a+b \left (c x^n\right )^{3/n}\right )}\right )}{6 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{6 a \left (a+b \left (c x^n\right )^{3/n}\right )^2}\right )\)

\(\Big \downarrow \) 1142

\(\displaystyle x \left (c x^n\right )^{-1/n} \left (\frac {5 \left (\frac {2 \left (\frac {\frac {3}{2} \sqrt [3]{a} \int \frac {1}{b^{2/3} \left (c x^n\right )^{2/n}-\sqrt [3]{a} \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+a^{2/3}}d\left (c x^n\right )^{\frac {1}{n}}-\frac {\int -\frac {\sqrt [3]{b} \left (\sqrt [3]{a}-2 \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}\right )}{b^{2/3} \left (c x^n\right )^{2/n}-\sqrt [3]{a} \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+a^{2/3}}d\left (c x^n\right )^{\frac {1}{n}}}{2 \sqrt [3]{b}}}{3 a^{2/3}}+\frac {\log \left (\sqrt [3]{a}+\sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}\right )}{3 a^{2/3} \sqrt [3]{b}}\right )}{3 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{3 a \left (a+b \left (c x^n\right )^{3/n}\right )}\right )}{6 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{6 a \left (a+b \left (c x^n\right )^{3/n}\right )^2}\right )\)

\(\Big \downarrow \) 25

\(\displaystyle x \left (c x^n\right )^{-1/n} \left (\frac {5 \left (\frac {2 \left (\frac {\frac {3}{2} \sqrt [3]{a} \int \frac {1}{b^{2/3} \left (c x^n\right )^{2/n}-\sqrt [3]{a} \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+a^{2/3}}d\left (c x^n\right )^{\frac {1}{n}}+\frac {\int \frac {\sqrt [3]{b} \left (\sqrt [3]{a}-2 \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}\right )}{b^{2/3} \left (c x^n\right )^{2/n}-\sqrt [3]{a} \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+a^{2/3}}d\left (c x^n\right )^{\frac {1}{n}}}{2 \sqrt [3]{b}}}{3 a^{2/3}}+\frac {\log \left (\sqrt [3]{a}+\sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}\right )}{3 a^{2/3} \sqrt [3]{b}}\right )}{3 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{3 a \left (a+b \left (c x^n\right )^{3/n}\right )}\right )}{6 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{6 a \left (a+b \left (c x^n\right )^{3/n}\right )^2}\right )\)

\(\Big \downarrow \) 27

\(\displaystyle x \left (c x^n\right )^{-1/n} \left (\frac {5 \left (\frac {2 \left (\frac {\frac {3}{2} \sqrt [3]{a} \int \frac {1}{b^{2/3} \left (c x^n\right )^{2/n}-\sqrt [3]{a} \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+a^{2/3}}d\left (c x^n\right )^{\frac {1}{n}}+\frac {1}{2} \int \frac {\sqrt [3]{a}-2 \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}}{b^{2/3} \left (c x^n\right )^{2/n}-\sqrt [3]{a} \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+a^{2/3}}d\left (c x^n\right )^{\frac {1}{n}}}{3 a^{2/3}}+\frac {\log \left (\sqrt [3]{a}+\sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}\right )}{3 a^{2/3} \sqrt [3]{b}}\right )}{3 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{3 a \left (a+b \left (c x^n\right )^{3/n}\right )}\right )}{6 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{6 a \left (a+b \left (c x^n\right )^{3/n}\right )^2}\right )\)

\(\Big \downarrow \) 1082

\(\displaystyle x \left (c x^n\right )^{-1/n} \left (\frac {5 \left (\frac {2 \left (\frac {\frac {1}{2} \int \frac {\sqrt [3]{a}-2 \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}}{b^{2/3} \left (c x^n\right )^{2/n}-\sqrt [3]{a} \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+a^{2/3}}d\left (c x^n\right )^{\frac {1}{n}}+\frac {3 \int \frac {1}{-\left (c x^n\right )^{2/n}-3}d\left (1-\frac {2 \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}}{\sqrt [3]{a}}\right )}{\sqrt [3]{b}}}{3 a^{2/3}}+\frac {\log \left (\sqrt [3]{a}+\sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}\right )}{3 a^{2/3} \sqrt [3]{b}}\right )}{3 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{3 a \left (a+b \left (c x^n\right )^{3/n}\right )}\right )}{6 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{6 a \left (a+b \left (c x^n\right )^{3/n}\right )^2}\right )\)

\(\Big \downarrow \) 217

\(\displaystyle x \left (c x^n\right )^{-1/n} \left (\frac {5 \left (\frac {2 \left (\frac {\frac {1}{2} \int \frac {\sqrt [3]{a}-2 \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}}{b^{2/3} \left (c x^n\right )^{2/n}-\sqrt [3]{a} \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+a^{2/3}}d\left (c x^n\right )^{\frac {1}{n}}-\frac {\sqrt {3} \arctan \left (\frac {1-\frac {2 \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}}{\sqrt [3]{a}}}{\sqrt {3}}\right )}{\sqrt [3]{b}}}{3 a^{2/3}}+\frac {\log \left (\sqrt [3]{a}+\sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}\right )}{3 a^{2/3} \sqrt [3]{b}}\right )}{3 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{3 a \left (a+b \left (c x^n\right )^{3/n}\right )}\right )}{6 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{6 a \left (a+b \left (c x^n\right )^{3/n}\right )^2}\right )\)

\(\Big \downarrow \) 1103

\(\displaystyle x \left (c x^n\right )^{-1/n} \left (\frac {5 \left (\frac {2 \left (\frac {-\frac {\log \left (a^{2/3}-\sqrt [3]{a} \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}+b^{2/3} \left (c x^n\right )^{2/n}\right )}{2 \sqrt [3]{b}}-\frac {\sqrt {3} \arctan \left (\frac {1-\frac {2 \sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}}{\sqrt [3]{a}}}{\sqrt {3}}\right )}{\sqrt [3]{b}}}{3 a^{2/3}}+\frac {\log \left (\sqrt [3]{a}+\sqrt [3]{b} \left (c x^n\right )^{\frac {1}{n}}\right )}{3 a^{2/3} \sqrt [3]{b}}\right )}{3 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{3 a \left (a+b \left (c x^n\right )^{3/n}\right )}\right )}{6 a}+\frac {\left (c x^n\right )^{\frac {1}{n}}}{6 a \left (a+b \left (c x^n\right )^{3/n}\right )^2}\right )\)

input
Int[(a + b*(c*x^n)^(3/n))^(-3),x]
 
output
(x*((c*x^n)^n^(-1)/(6*a*(a + b*(c*x^n)^(3/n))^2) + (5*((c*x^n)^n^(-1)/(3*a 
*(a + b*(c*x^n)^(3/n))) + (2*(Log[a^(1/3) + b^(1/3)*(c*x^n)^n^(-1)]/(3*a^( 
2/3)*b^(1/3)) + (-((Sqrt[3]*ArcTan[(1 - (2*b^(1/3)*(c*x^n)^n^(-1))/a^(1/3) 
)/Sqrt[3]])/b^(1/3)) - Log[a^(2/3) - a^(1/3)*b^(1/3)*(c*x^n)^n^(-1) + b^(2 
/3)*(c*x^n)^(2/n)]/(2*b^(1/3)))/(3*a^(2/3))))/(3*a)))/(6*a)))/(c*x^n)^n^(- 
1)
 

3.31.45.3.1 Defintions of rubi rules used

rule 16
Int[(c_.)/((a_.) + (b_.)*(x_)), x_Symbol] :> Simp[c*(Log[RemoveContent[a + 
b*x, x]]/b), x] /; FreeQ[{a, b, c}, x]
 

rule 25
Int[-(Fx_), x_Symbol] :> Simp[Identity[-1]   Int[Fx, x], x]
 

rule 27
Int[(a_)*(Fx_), x_Symbol] :> Simp[a   Int[Fx, x], x] /; FreeQ[a, x] &&  !Ma 
tchQ[Fx, (b_)*(Gx_) /; FreeQ[b, x]]
 

rule 217
Int[((a_) + (b_.)*(x_)^2)^(-1), x_Symbol] :> Simp[(-(Rt[-a, 2]*Rt[-b, 2])^( 
-1))*ArcTan[Rt[-b, 2]*(x/Rt[-a, 2])], x] /; FreeQ[{a, b}, x] && PosQ[a/b] & 
& (LtQ[a, 0] || LtQ[b, 0])
 

rule 749
Int[((a_) + (b_.)*(x_)^(n_))^(p_), x_Symbol] :> Simp[(-x)*((a + b*x^n)^(p + 
 1)/(a*n*(p + 1))), x] + Simp[(n*(p + 1) + 1)/(a*n*(p + 1))   Int[(a + b*x^ 
n)^(p + 1), x], x] /; FreeQ[{a, b}, x] && IGtQ[n, 0] && LtQ[p, -1] && (Inte 
gerQ[2*p] || Denominator[p + 1/n] < Denominator[p])
 

rule 750
Int[((a_) + (b_.)*(x_)^3)^(-1), x_Symbol] :> Simp[1/(3*Rt[a, 3]^2)   Int[1/ 
(Rt[a, 3] + Rt[b, 3]*x), x], x] + Simp[1/(3*Rt[a, 3]^2)   Int[(2*Rt[a, 3] - 
 Rt[b, 3]*x)/(Rt[a, 3]^2 - Rt[a, 3]*Rt[b, 3]*x + Rt[b, 3]^2*x^2), x], x] /; 
 FreeQ[{a, b}, x]
 

rule 786
Int[((a_) + (b_.)*((c_.)*(x_)^(q_.))^(n_))^(p_), x_Symbol] :> Simp[x/(c*x^q 
)^(1/q)   Subst[Int[(a + b*x^(n*q))^p, x], x, (c*x^q)^(1/q)], x] /; FreeQ[{ 
a, b, c, n, p, q}, x] && IntegerQ[n*q] && NeQ[x, (c*x^q)^(1/q)]
 

rule 1082
Int[((a_) + (b_.)*(x_) + (c_.)*(x_)^2)^(-1), x_Symbol] :> With[{q = 1 - 4*S 
implify[a*(c/b^2)]}, Simp[-2/b   Subst[Int[1/(q - x^2), x], x, 1 + 2*c*(x/b 
)], x] /; RationalQ[q] && (EqQ[q^2, 1] ||  !RationalQ[b^2 - 4*a*c])] /; Fre 
eQ[{a, b, c}, x]
 

rule 1103
Int[((d_) + (e_.)*(x_))/((a_.) + (b_.)*(x_) + (c_.)*(x_)^2), x_Symbol] :> S 
imp[d*(Log[RemoveContent[a + b*x + c*x^2, x]]/b), x] /; FreeQ[{a, b, c, d, 
e}, x] && EqQ[2*c*d - b*e, 0]
 

rule 1142
Int[((d_.) + (e_.)*(x_))/((a_) + (b_.)*(x_) + (c_.)*(x_)^2), x_Symbol] :> S 
imp[(2*c*d - b*e)/(2*c)   Int[1/(a + b*x + c*x^2), x], x] + Simp[e/(2*c) 
Int[(b + 2*c*x)/(a + b*x + c*x^2), x], x] /; FreeQ[{a, b, c, d, e}, x]
 
3.31.45.4 Maple [C] (warning: unable to verify)

Result contains higher order function than in optimal. Order 9 vs. order 3.

Time = 2.29 (sec) , antiderivative size = 981, normalized size of antiderivative = 4.17

method result size
risch \(\text {Expression too large to display}\) \(981\)

input
int(1/(a+b*(c*x^n)^(3/n))^3,x,method=_RETURNVERBOSE)
 
output
1/18*x*(5*b*c^(3/n)*(x^n)^(3/n)*exp(3/2*I*Pi*csgn(I*c*x^n)*(csgn(I*c)-csgn 
(I*c*x^n))*(-csgn(I*x^n)+csgn(I*c*x^n))/n)+8*a)/a^2/(a+b*c^(3/n)*(x^n)^(3/ 
n)*exp(3/2*I*Pi*csgn(I*c*x^n)*(csgn(I*c)-csgn(I*c*x^n))*(-csgn(I*x^n)+csgn 
(I*c*x^n))/n))^2+5/27/a^2/b/(c^(3/n))/((x^n)^(3/n))*x^3*exp(-3/2*I*Pi*csgn 
(I*c*x^n)*(-csgn(I*x^n)+csgn(I*c*x^n))*(csgn(I*c)-csgn(I*c*x^n))/n)/(a/b/( 
c^(3/n))/((x^n)^(3/n))*x^3*exp(-3/2*I*Pi*csgn(I*c*x^n)*(-csgn(I*x^n)+csgn( 
I*c*x^n))*(csgn(I*c)-csgn(I*c*x^n))/n))^(2/3)*ln(x+(a/b/(c^(3/n))/((x^n)^( 
3/n))*x^3*exp(-3/2*I*Pi*csgn(I*c*x^n)*(-csgn(I*x^n)+csgn(I*c*x^n))*(csgn(I 
*c)-csgn(I*c*x^n))/n))^(1/3))-5/54/a^2/b/(c^(3/n))/((x^n)^(3/n))*x^3*exp(- 
3/2*I*Pi*csgn(I*c*x^n)*(-csgn(I*x^n)+csgn(I*c*x^n))*(csgn(I*c)-csgn(I*c*x^ 
n))/n)/(a/b/(c^(3/n))/((x^n)^(3/n))*x^3*exp(-3/2*I*Pi*csgn(I*c*x^n)*(-csgn 
(I*x^n)+csgn(I*c*x^n))*(csgn(I*c)-csgn(I*c*x^n))/n))^(2/3)*ln(x^2-(a/b/(c^ 
(3/n))/((x^n)^(3/n))*x^3*exp(-3/2*I*Pi*csgn(I*c*x^n)*(-csgn(I*x^n)+csgn(I* 
c*x^n))*(csgn(I*c)-csgn(I*c*x^n))/n))^(1/3)*x+(a/b/(c^(3/n))/((x^n)^(3/n)) 
*x^3*exp(-3/2*I*Pi*csgn(I*c*x^n)*(-csgn(I*x^n)+csgn(I*c*x^n))*(csgn(I*c)-c 
sgn(I*c*x^n))/n))^(2/3))+5/27/a^2/b/(c^(3/n))/((x^n)^(3/n))*x^3*exp(-3/2*I 
*Pi*csgn(I*c*x^n)*(-csgn(I*x^n)+csgn(I*c*x^n))*(csgn(I*c)-csgn(I*c*x^n))/n 
)/(a/b/(c^(3/n))/((x^n)^(3/n))*x^3*exp(-3/2*I*Pi*csgn(I*c*x^n)*(-csgn(I*x^ 
n)+csgn(I*c*x^n))*(csgn(I*c)-csgn(I*c*x^n))/n))^(2/3)*3^(1/2)*arctan(1/3*3 
^(1/2)*(2/(a/b/(c^(3/n))/((x^n)^(3/n))*x^3*exp(-3/2*I*Pi*csgn(I*c*x^n)*...
 
3.31.45.5 Fricas [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 408 vs. \(2 (194) = 388\).

Time = 0.30 (sec) , antiderivative size = 885, normalized size of antiderivative = 3.77 \[ \int \frac {1}{\left (a+b \left (c x^n\right )^{3/n}\right )^3} \, dx=\left [\frac {15 \, a^{2} b^{2} c^{\frac {6}{n}} x^{4} + 24 \, a^{3} b c^{\frac {3}{n}} x + 15 \, \sqrt {\frac {1}{3}} {\left (a b^{3} c^{\frac {9}{n}} x^{6} + 2 \, a^{2} b^{2} c^{\frac {6}{n}} x^{3} + a^{3} b c^{\frac {3}{n}}\right )} \sqrt {-\frac {\left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {1}{3}}}{b c^{\frac {3}{n}}}} \log \left (\frac {2 \, a b c^{\frac {3}{n}} x^{3} - 3 \, \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {1}{3}} a x - a^{2} + 3 \, \sqrt {\frac {1}{3}} {\left (2 \, a b c^{\frac {3}{n}} x^{2} + \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {2}{3}} x - \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {1}{3}} a\right )} \sqrt {-\frac {\left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {1}{3}}}{b c^{\frac {3}{n}}}}}{b c^{\frac {3}{n}} x^{3} + a}\right ) - 5 \, {\left (b^{2} c^{\frac {6}{n}} x^{6} + 2 \, a b c^{\frac {3}{n}} x^{3} + a^{2}\right )} \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {2}{3}} \log \left (a b c^{\frac {3}{n}} x^{2} - \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {2}{3}} x + \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {1}{3}} a\right ) + 10 \, {\left (b^{2} c^{\frac {6}{n}} x^{6} + 2 \, a b c^{\frac {3}{n}} x^{3} + a^{2}\right )} \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {2}{3}} \log \left (a b c^{\frac {3}{n}} x + \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {2}{3}}\right )}{54 \, {\left (a^{4} b^{3} c^{\frac {9}{n}} x^{6} + 2 \, a^{5} b^{2} c^{\frac {6}{n}} x^{3} + a^{6} b c^{\frac {3}{n}}\right )}}, \frac {15 \, a^{2} b^{2} c^{\frac {6}{n}} x^{4} + 24 \, a^{3} b c^{\frac {3}{n}} x + 30 \, \sqrt {\frac {1}{3}} {\left (a b^{3} c^{\frac {9}{n}} x^{6} + 2 \, a^{2} b^{2} c^{\frac {6}{n}} x^{3} + a^{3} b c^{\frac {3}{n}}\right )} \sqrt {\frac {\left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {1}{3}}}{b c^{\frac {3}{n}}}} \arctan \left (\frac {\sqrt {\frac {1}{3}} {\left (2 \, \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {2}{3}} x - \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {1}{3}} a\right )} \sqrt {\frac {\left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {1}{3}}}{b c^{\frac {3}{n}}}}}{a^{2}}\right ) - 5 \, {\left (b^{2} c^{\frac {6}{n}} x^{6} + 2 \, a b c^{\frac {3}{n}} x^{3} + a^{2}\right )} \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {2}{3}} \log \left (a b c^{\frac {3}{n}} x^{2} - \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {2}{3}} x + \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {1}{3}} a\right ) + 10 \, {\left (b^{2} c^{\frac {6}{n}} x^{6} + 2 \, a b c^{\frac {3}{n}} x^{3} + a^{2}\right )} \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {2}{3}} \log \left (a b c^{\frac {3}{n}} x + \left (a^{2} b c^{\frac {3}{n}}\right )^{\frac {2}{3}}\right )}{54 \, {\left (a^{4} b^{3} c^{\frac {9}{n}} x^{6} + 2 \, a^{5} b^{2} c^{\frac {6}{n}} x^{3} + a^{6} b c^{\frac {3}{n}}\right )}}\right ] \]

input
integrate(1/(a+b*(c*x^n)^(3/n))^3,x, algorithm="fricas")
 
output
[1/54*(15*a^2*b^2*c^(6/n)*x^4 + 24*a^3*b*c^(3/n)*x + 15*sqrt(1/3)*(a*b^3*c 
^(9/n)*x^6 + 2*a^2*b^2*c^(6/n)*x^3 + a^3*b*c^(3/n))*sqrt(-(a^2*b*c^(3/n))^ 
(1/3)/(b*c^(3/n)))*log((2*a*b*c^(3/n)*x^3 - 3*(a^2*b*c^(3/n))^(1/3)*a*x - 
a^2 + 3*sqrt(1/3)*(2*a*b*c^(3/n)*x^2 + (a^2*b*c^(3/n))^(2/3)*x - (a^2*b*c^ 
(3/n))^(1/3)*a)*sqrt(-(a^2*b*c^(3/n))^(1/3)/(b*c^(3/n))))/(b*c^(3/n)*x^3 + 
 a)) - 5*(b^2*c^(6/n)*x^6 + 2*a*b*c^(3/n)*x^3 + a^2)*(a^2*b*c^(3/n))^(2/3) 
*log(a*b*c^(3/n)*x^2 - (a^2*b*c^(3/n))^(2/3)*x + (a^2*b*c^(3/n))^(1/3)*a) 
+ 10*(b^2*c^(6/n)*x^6 + 2*a*b*c^(3/n)*x^3 + a^2)*(a^2*b*c^(3/n))^(2/3)*log 
(a*b*c^(3/n)*x + (a^2*b*c^(3/n))^(2/3)))/(a^4*b^3*c^(9/n)*x^6 + 2*a^5*b^2* 
c^(6/n)*x^3 + a^6*b*c^(3/n)), 1/54*(15*a^2*b^2*c^(6/n)*x^4 + 24*a^3*b*c^(3 
/n)*x + 30*sqrt(1/3)*(a*b^3*c^(9/n)*x^6 + 2*a^2*b^2*c^(6/n)*x^3 + a^3*b*c^ 
(3/n))*sqrt((a^2*b*c^(3/n))^(1/3)/(b*c^(3/n)))*arctan(sqrt(1/3)*(2*(a^2*b* 
c^(3/n))^(2/3)*x - (a^2*b*c^(3/n))^(1/3)*a)*sqrt((a^2*b*c^(3/n))^(1/3)/(b* 
c^(3/n)))/a^2) - 5*(b^2*c^(6/n)*x^6 + 2*a*b*c^(3/n)*x^3 + a^2)*(a^2*b*c^(3 
/n))^(2/3)*log(a*b*c^(3/n)*x^2 - (a^2*b*c^(3/n))^(2/3)*x + (a^2*b*c^(3/n)) 
^(1/3)*a) + 10*(b^2*c^(6/n)*x^6 + 2*a*b*c^(3/n)*x^3 + a^2)*(a^2*b*c^(3/n)) 
^(2/3)*log(a*b*c^(3/n)*x + (a^2*b*c^(3/n))^(2/3)))/(a^4*b^3*c^(9/n)*x^6 + 
2*a^5*b^2*c^(6/n)*x^3 + a^6*b*c^(3/n))]
 
3.31.45.6 Sympy [F]

\[ \int \frac {1}{\left (a+b \left (c x^n\right )^{3/n}\right )^3} \, dx=\int \frac {1}{\left (a + b \left (c x^{n}\right )^{\frac {3}{n}}\right )^{3}}\, dx \]

input
integrate(1/(a+b*(c*x**n)**(3/n))**3,x)
 
output
Integral((a + b*(c*x**n)**(3/n))**(-3), x)
 
3.31.45.7 Maxima [F]

\[ \int \frac {1}{\left (a+b \left (c x^n\right )^{3/n}\right )^3} \, dx=\int { \frac {1}{{\left (\left (c x^{n}\right )^{\frac {3}{n}} b + a\right )}^{3}} \,d x } \]

input
integrate(1/(a+b*(c*x^n)^(3/n))^3,x, algorithm="maxima")
 
output
1/18*(5*b*c^(3/n)*x*(x^n)^(3/n) + 8*a*x)/(a^2*b^2*c^(6/n)*(x^n)^(6/n) + 2* 
a^3*b*c^(3/n)*(x^n)^(3/n) + a^4) + 5*integrate(1/9/(a^2*b*c^(3/n)*(x^n)^(3 
/n) + a^3), x)
 
3.31.45.8 Giac [F]

\[ \int \frac {1}{\left (a+b \left (c x^n\right )^{3/n}\right )^3} \, dx=\int { \frac {1}{{\left (\left (c x^{n}\right )^{\frac {3}{n}} b + a\right )}^{3}} \,d x } \]

input
integrate(1/(a+b*(c*x^n)^(3/n))^3,x, algorithm="giac")
 
output
integrate(((c*x^n)^(3/n)*b + a)^(-3), x)
 
3.31.45.9 Mupad [F(-1)]

Timed out. \[ \int \frac {1}{\left (a+b \left (c x^n\right )^{3/n}\right )^3} \, dx=\int \frac {1}{{\left (a+b\,{\left (c\,x^n\right )}^{3/n}\right )}^3} \,d x \]

input
int(1/(a + b*(c*x^n)^(3/n))^3,x)
 
output
int(1/(a + b*(c*x^n)^(3/n))^3, x)